package com.jianjun.project.system.role;

import cn.hutool.core.collection.CollectionUtil;
import com.jfinal.aop.Before;
import com.jfinal.kit.Kv;
import com.jfinal.plugin.activerecord.Db;
import com.jfinal.plugin.activerecord.Model;
import com.jfinal.plugin.activerecord.Page;
import com.jfinal.plugin.activerecord.SqlPara;
import com.jfinal.plugin.activerecord.tx.Tx;
import com.jianjun.common.constant.Constants;
import com.jianjun.common.constant.UserConstants;
import com.jianjun.common.exception.ServiceException;
import com.jianjun.common.util.SecurityUtils;
import com.jianjun.framework.web.interceptor.DataScopeInterceptor;
import com.jianjun.project.common.model.SysDept;
import com.jianjun.project.common.model.SysRole;
import com.jianjun.project.common.model.SysRoleDept;
import com.jianjun.project.common.model.SysRoleMenu;
import com.jianjun.project.common.model.SysUser;
import com.jianjun.project.common.model.SysUserRole;
import com.jianjun.project.common.model.base.BaseSysDept;

import java.util.ArrayList;
import java.util.Arrays;
import java.util.Collection;
import java.util.Collections;
import java.util.Date;
import java.util.HashSet;
import java.util.List;
import java.util.Objects;
import java.util.Set;
import java.util.stream.Collectors;

/**
 *
 * @author source
 * {@code @date} 2025/1/9 12:28
 */
public class SysRoleService {
    private final SysRole dao = new SysRole().dao();
    private final SysDept daoDept = new SysDept().dao();

    public Page<SysRole> paginate(SysRole model) {
        SqlPara sqlParaDb = Db.getSqlPara("querySysRole", Kv.by("cond", model.toMap()).set(DataScopeInterceptor.getDataScope()).set(model.getColumnAsc()));
        return dao.paginate(model.getPageNum(), model.getPageSize(), sqlParaDb);
    }

    /**
     * 根据条件分页查询字典类型
     */
    public List<SysRole> selectRoleList(Model<SysRole> model) {
        SqlPara sqlParaDb = Db.getSqlPara("querySysRole", Kv.by("cond", model.toMap()).set(DataScopeInterceptor.getDataScope()));
        return dao.find(sqlParaDb);
    }

    public SysRole selectMenuFirst(Model<SysRole> model) {
        SqlPara sqlParaDb = Db.getSqlPara("querySysRole", Kv.by("cond", model.toMap()));
        return dao.findFirst(sqlParaDb);
    }

    public List<SysRole> selectRoleAll() {
        return dao.findAll();
    }

    public Collection<String> selectRolePermissionByUserId(Long userId) {
        SqlPara sqlParaDb = Db.getSqlPara("querySysRole", Kv.by("userId", userId));
        List<SysRole> perms = dao.find(sqlParaDb);
        Set<String> permsSet = new HashSet<>();
        for (SysRole perm : perms) {
            if (Objects.nonNull(perm)) {
                permsSet.addAll(Arrays.asList(perm.getRoleKey().trim().split(Constants.DELIMETER)));
            }
        }
        return permsSet;
    }

    public SysRole selectRoleById(Long roleId) {
        return dao.findById(roleId);
    }

    /**
     * 校验角色是否有数据权限
     *
     * @param roleIds 角色id
     */
    public void checkRoleDataScope(Long... roleIds) {
        if (!SysUser.isAdmin(SecurityUtils.getUserId())) {
            for (Long roleId : roleIds) {
                SysRole role = new SysRole();
                role.setRoleId(roleId);
                List<SysRole> roles = selectRoleList(role);
                if (CollectionUtil.isEmpty(roles)) {
                    throw new ServiceException("没有权限访问角色数据！");
                }
            }
        }
    }


    /**
     * 校验角色名称是否唯一
     *
     * @param role 角色信息
     * @return 结果
     */
    public boolean checkRoleNameUnique(SysRole role) {
        long roleId = Objects.isNull(role.getRoleId()) ? -1L : role.getRoleId();
        SysRole model = new SysRole();
        model.setRoleName(role.getRoleName());
        SysRole info = selectMenuFirst(model);
        if (Objects.nonNull(info) && info.getRoleId() != roleId) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验角色权限是否唯一
     *
     * @param role 角色信息
     * @return 结果
     */

    public boolean checkRoleKeyUnique(SysRole role) {
        long roleId = Objects.isNull(role.getRoleId()) ? -1L : role.getRoleId();
        SysRole model = new SysRole();
        model.setRoleKey(role.getRoleKey());
        SysRole info = selectMenuFirst(model);
        if (Objects.nonNull(info) && info.getRoleId() != roleId) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验角色是否允许操作
     *
     * @param role 角色信息
     */
    public void checkRoleAllowed(SysRole role) {
        if (Objects.nonNull(role.getRoleId()) && role.isAdmin()) {
            throw new ServiceException("不允许操作超级管理员角色");
        }
    }


    /**
     * 新增保存角色信息
     *
     * @param role 角色信息
     * @return 结果
     */

    @Before(Tx.class)
    public int insertRole(SysRole role) {
        role.setCreateTime(new Date());
        role.save();
        // 新增角色信息
        return insertRoleMenu(role);
    }

    /**
     * 修改保存角色信息
     *
     * @param role 角色信息
     * @return 结果
     */
    @Before(Tx.class)
    public boolean updateRole(SysRole role) {
        // 删除角色与菜单关联
        Db.template("deleteRoleMenu", Kv.by("roleIds", Collections.singletonList(role.getRoleId()))).update();
        insertRoleMenu(role);
        // 修改角色信息
        return updateRoleDb(role);
    }

    public int countUserRoleByRoleId(Long roleId) {
        SysUserRole model = new SysUserRole();
        model.setRoleId(roleId);
        SqlPara sqlParaDb = Db.getSqlPara("querySysUserRole", Kv.by("cond", model.toMap()));
        return Db.queryInt(sqlParaDb.getSql().replace("*", "count(1)"), sqlParaDb.getPara());
    }

    /**
     * 批量删除角色信息
     *
     * @param roleIds 需要删除的角色ID
     * @return 结果
     */
    public int deleteRoleByIds(Long[] roleIds) {
        for (Long roleId : roleIds) {
            SysRole temp = new SysRole();
            temp.setRoleId(roleId);
            checkRoleAllowed(temp);
            checkRoleDataScope(roleId);
            SysRole role = selectRoleById(roleId);
            if (countUserRoleByRoleId(roleId) > 0) {
                throw new ServiceException(String.format("%1$s已分配,不能删除", role.getRoleName()));
            }
        }
        // 删除角色与菜单关联
        Db.template("deleteRoleMenu", Kv.by("roleIds", roleIds)).update();
        // 删除角色与部门关联
        Db.template("deleteRoleDept", Kv.by("roleIds", roleIds)).update();
        return Db.template("deleteRole", Kv.by("roleIds", roleIds)).update();
    }

    /**
     * 新增角色菜单信息
     *
     * @param role 角色对象
     */
    public int insertRoleMenu(SysRole role) {
        int rows = 1;
        // 新增用户与角色管理
        List<SysRoleMenu> list = new ArrayList<>();
        for (Long menuId : role.getMenuIds()) {
            SysRoleMenu rm = new SysRoleMenu();
            rm.setRoleId(role.getRoleId());
            rm.setMenuId(menuId);
            list.add(rm);
        }
        if (!list.isEmpty()) {
            rows = Arrays.stream(Db.batchSave(list, list.size())).sum();
        }
        return rows;
    }

    /**
     * 根据角色ID查询部门树信息
     *
     * @param roleId 角色ID
     * @return 选中部门列表
     */
    public List<Long> selectDeptListByRoleId(Long roleId) {
        SysRole role = dao.findById(roleId);
        return daoDept.template("querySysDept", Kv.by("roleId", roleId).set("deptCheckStrictly", role.getDeptCheckStrictly())).find().stream().map(BaseSysDept::getDeptId).collect(Collectors.toList());
    }

    /**
     * 根据用户ID查询角色
     *
     * @param userId 用户ID
     * @return 角色列表
     */
    public List<SysRole> selectRolesByUserId(Long userId) {
        SqlPara sqlParaDb = Db.getSqlPara("querySysRole", Kv.by("userId", userId).set(DataScopeInterceptor.getDataScope()));
        List<SysRole> userRoles = dao.find(sqlParaDb);
        List<SysRole> roles = selectRoleAll();
        for (SysRole role : roles) {
            for (SysRole userRole : userRoles) {
                if (role.getRoleId().longValue() == userRole.getRoleId().longValue()) {
                    role.setFlag(true);
                    break;
                }
            }
        }
        return roles;
    }

    /**
     * 修改数据权限信息
     *
     * @param role 角色信息
     * @return 结果
     */
    @Before(Tx.class)
    public int authDataScope(SysRole role) {
        // 修改角色信息
        updateRoleDb(role);
        // 删除角色与部门关联
        Db.template("deleteRoleDept", Kv.by("roleIds", Collections.singletonList(role.getRoleId()))).update();
        // 新增角色和部门信息（数据权限）
        return insertRoleDept(role);
    }

    /**
     * 新增角色部门信息(数据权限)
     *
     * @param role 角色对象
     */
    public int insertRoleDept(SysRole role) {
        int rows = 1;
        // 新增角色与部门（数据权限）管理
        List<SysRoleDept> list = new ArrayList<>();
        for (Long deptId : role.getDeptIds()) {
            SysRoleDept rd = new SysRoleDept();
            rd.setRoleId(role.getRoleId());
            rd.setDeptId(deptId);
            list.add(rd);
        }
        if (!list.isEmpty()) {
            rows = Arrays.stream(Db.batchSave(list, list.size())).sum();
        }
        return rows;
    }

    /**
     * 取消授权用户角色
     *
     * @param userRole 用户和角色关联信息
     * @return 结果
     */
    public int deleteAuthUser(SysUserRole userRole) {
        SqlPara sqlParaDb = Db.getSqlPara("deleteUserRole", Kv.by("cond", userRole.toMap()));
        return Db.update(sqlParaDb);
    }

    /**
     * 批量取消授权用户角色
     *
     * @param roleId 角色ID
     * @param userIds 需要取消授权的用户数据ID
     * @return 结果
     */
    public int deleteAuthUsers(Long roleId, Long[] userIds) {
        SysUserRole model = new SysUserRole();
        model.setRoleId(roleId);
        return Db.template("deleteUserRole", Kv.by("cond", model.toMap()).set("userIds", userIds)).update();
    }

    /**
     * 批量选择授权用户角色
     *
     * @param roleId 角色ID
     * @param userIds 需要授权的用户数据ID
     * @return 结果
     */
    public int insertAuthUsers(Long roleId, Long[] userIds) {
        // 新增用户与角色管理
        List<SysUserRole> list = new ArrayList<>();
        for (Long userId : userIds) {
            SysUserRole ur = new SysUserRole();
            ur.setUserId(userId);
            ur.setRoleId(roleId);
            list.add(ur);
        }
        return Arrays.stream(Db.batchSave(list, list.size())).sum();
    }


    public boolean updateRoleDb(SysRole role) {
        role.setUpdateTime(new Date());
        return role.update();
    }
}
